home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / gnu / button12.lha / button8802.ps next >
Text File  |  1993-08-05  |  3KB  |  83 lines

  1. % button8802.ps - A GNU Button Program
  2. % This program may be freely redistributed under the terms of the GNU
  3. % General Public License.
  4. % Copyright 1988, 1989, 1992 Free Software Foundation
  5. % 28May89 modified to allowd variable diameter buttons. -tower
  6. % This GNU Button program is distributed in the hope that it will be
  7. % useful, but WITHOUT ANY WARRANTY.  No author or distributor accepts
  8. % responsibility to anyone for the consequences of using it or for
  9. % whether it serves any particular purpose or works at all, unless he
  10. % says so in writing.  Refer to the GNU General Public License for
  11. % full details.
  12. % Everyone is granted permission to copy, modify and redistribute this
  13. % GNU Button Program, but only under the conditions described in the
  14. % GNU General Public License.  A copy of this license is supposed to
  15. % have been given to you along with the GNU Button Program so you can
  16. % know your rights and responsibilities.  It should be in a file named
  17. % COPYING.  Among other things, the copyright notice and this notice
  18. % must be preserved on all copies.
  19. % Hard copies of this button were first distributed at the February
  20. % 1988 Dallas Usenix.  They had black Lettering on a white background
  21. % on a standard 2 1/4" safety pin button.  They were designed by
  22. % Leonard H. Tower Jr. who is also the author of this GNU Button
  23. % Program.
  24. % Report bugs or improvements to: tower@prep.ai.mit.edu
  25. % Hard copies of this button are probably still available.  One much
  26. % have either donated source code or documentation to the GNU Project
  27. % or make a donation of at least $ 2.00.
  28. % If you wish a hard copy of this button send both:
  29. %     - a self-addressed, stamped envelope; and
  30. %     - either:
  31. %         - a reminder of your source or documentation contribution; or
  32. %         - a donation payable to the "Free Software Foundation"
  33. % to:    L. Tower Jr.
  34. %     36 Porter Street
  35. %     Somerville, MA 02143, USA
  36. % This program is available for anonymous ftp in
  37. % prep.ai.mit.edu:/u2/emacs/button.N.MM.shar.  It is probably
  38. % available in other source archives.
  39.  
  40. % Uses {in,out}sidecircletext routines from Adobe Cookbook.
  41. .so circtext.ps
  42.  
  43. % center button on 8 1/2" x 11" page
  44. 306 396 translate
  45.  
  46. % This is a kludge to give better edge resolution.
  47. % Note that postscript's scale command doesn't cut it.
  48. % It scales after the edges are set.
  49. % biggg is set to 2,3,4 or 3.9 to make a master that is that much larger.
  50. % The master is reduced that much by the button manufacturer.
  51. % If only 1200 dpi postscript printers were more common ...
  52. /biggg 1 def
  53.  
  54. gsave
  55.   /gnustar (GNU) def
  56.   /gnustpt 52 biggg mul def
  57.   /Times-Bold findfont gnustpt scalefont setfont
  58.   %center
  59.   gnustar stringwidth pop 2 div neg gnustpt 3 div neg moveto
  60.   gnustar show
  61. grestore
  62. /Times-Bold findfont 10 biggg mul scalefont setfont
  63. (GNU's Not Unix)
  64.   10 biggg mul 270 64 biggg mul insidecircletext
  65. /Times-Roman findfont 7.5 biggg mul scalefont setfont
  66. (Copyright 1988 Free Software Foundation)
  67.   7.5 biggg mul 270 75 biggg mul insidecircletext
  68. (This button design may be freely redistributed under the terms of the GNU General Public License.)
  69.   7.5 biggg mul 90 69 biggg mul outsidecircletext
  70. showpage
  71.  
  72.